Inference at * 1 
Iof proof for Lemma absval elim:



1. P : 
2. x:. P(|x|)
3. x : 
  P(x) 

latex

 by ((DTerm x 2) 
CollapseTHENA ((Auto_aux (first_nat 1:n) ((first_nat 1:n),(first_nat 3:n
C)) (first_tok :t) inil_term))) 

latex

C1: 

C1: 2. x : 
C1: 3. P(|x|)
C1:   P(x)
C.

Definitions

t  T, , x:A. B(x)